; Music of Zone Part 2 (1989) (Black System) (Luc Guillaume)
; Ripped by Megachur the 26/02/2009

	write "ZONEPAR2.BIN"

music_date_rip	equ &1a29
music_adr	equ &8a12
first_theme	equ 1
last_theme	equ 1	; 1 -> 1

	read "music_header_v1_0.asm"

;
.init_music
;
	push af
	call #bca7
	pop af
	ld hl,l8baf
	cp #00
	jp z,#bcdd
	ld a,#01
	ld hl,l8bc3
	call #bcbc
	ld a,#01
	ld hl,l8bcd
	call #bcbf
	ld a,#02
	ld hl,l8bd4
	call #bcbc
	ld a,#02
	ld hl,l8bd8
	call #bcbf
	ld a,#03
	ld hl,l8bdf
	call #bcbc
	ld a,#03
	ld hl,l8be6
	call #bcbf
	ld a,#04
	ld hl,l8bed
	call #bcbc
	ld a,#05
	ld hl,l8bf4
	call #bcbc
	ld a,#06
	ld hl,l8bf8
	call #bcbc
	ld a,#01
	ld (l8bbe),a
	ld hl,(l8c02)
	ld (l8bc1),hl
	ld hl,l8c04
	ld (l8bbf),hl
	ld hl,l8baf
	ld bc,#8100
	ld de,l8a84
	jp #bcd7
;
.play_music_interrupt
.l8a84
;
	di
	push af
	push de
	push hl
	push bc
	push ix
	push iy
	call l8a9b
	pop iy
	pop ix
	pop bc
	pop hl
	pop de
	pop af
	ei
	reti
;
.play_music
.l8a9b
;
	ld a,(l8bbe)
	dec a
	cp #00
	jp z,l8aa8
	ld (l8bbe),a
	ret
.l8aa8
	ld hl,(l8bc1)
	dec hl
	ld a,h
	or l
	jp z,l8ae3
	ld (l8bc1),hl
	ld b,#03
	ld ix,(l8bbf)
.l8aba
	push bc
	push ix
	ld de,#0001
	ld a,(ix+#00)
	cp #00
	jp z,l8ace
	call l8af5
	ld de,#0005
.l8ace
	pop ix
	pop bc
	add ix,de
	djnz l8aba
	ld a,(ix+#00)
	inc a
	ld (l8bbe),a
	inc ix
	ld (l8bbf),ix
	ret
.l8ae3
	ld hl,l8c04
	ld (l8bbf),hl
	ld hl,(l8c02)
	ld (l8bc1),hl
	ld a,#01
	ld (l8bbe),a
	ret
.l8af5
	ld a,(ix+#00)
	or a
	ret z
	ld a,(ix+#04)
	ld iy,l8b31
.l8b01
	dec a
	cp #00
	jp z,l8b0f
	ld de,#0009
	add iy,de
	jp l8b01
.l8b0f
	ld a,(ix+#00)
	ld (iy+#00),a
	ld a,(ix+#01)
	ld (iy+#03),a
	ld a,(ix+#02)
	ld (iy+#04),a
	ld a,(ix+#03)
	ld (iy+#07),a
	ld (iy+#08),#00
	push iy
	pop hl
	jp #bcaa
.l8b31
	db #00,#01,#00,#00,#00,#00,#0f,#00
	db #00,#00,#02,#00,#00,#00,#05,#0f
	db #00,#00,#00,#03,#00,#00,#00,#00
	db #0f,#00,#00,#00,#04,#00,#00,#00
	db #00,#0f,#00,#00,#00,#02,#00,#00
	db #00,#00,#0f,#00,#00,#00,#02,#00
	db #00,#00,#0f,#0f,#00,#00,#00,#02
	db #00,#00,#00,#19,#0f,#00,#00,#00
	db #05,#00,#00,#00,#05,#0f,#00,#00
	db #00,#05,#00,#00,#00,#0f,#0f,#00
	db #00,#00,#05,#00,#00,#00,#0f,#0f
	db #00,#00,#00,#05,#00,#00,#00,#00
	db #0f,#00,#00,#00,#03,#01,#00,#00
	db #00,#0f,#00,#00,#00,#06,#00,#00
	db #00,#01,#00,#00,#00,#00,#00,#02
	db #00,#00,#00,#0d,#00,#00
.l8baf
	db #00,#00,#00,#00,#00,#00,#00,#00
.l8bbe equ $ + 7
	db #00,#00,#00,#00,#00,#00,#00,#00
.l8bc3 equ $ + 4
.l8bc1 equ $ + 2
.l8bbf
	db #00,#00,#00,#00,#03,#01,#00,#0a
.l8bcd equ $ + 6
	db #0a,#ff,#01,#01,#00,#0a,#82,#14
.l8bd4 equ $ + 5
	db #01,#01,#14,#ff,#01,#01,#0f,#ff
.l8bd8 equ $ + 1
	db #02,#82,#03,#01,#03,#03,#ff,#03
.l8be6 equ $ + 7
.l8bdf
	db #02,#0a,#ff,#08,#05,#ff,#04,#02
.l8bed equ $ + 6
	db #50,#01,#01,#14,#02,#01,#02,#10
.l8bf4 equ $ + 5
	db #02,#01,#0f,#ff,#01,#01,#0f,#ff
.l8bf8 equ $ + 1
	db #01,#03,#01,#0a,#01,#01,#00,#04
.l8c04 equ $ + 5
.l8c02 equ $ + 3
	db #05,#fe,#01,#56,#00,#01,#7b,#01
	db #1e,#05,#00,#00,#1d,#01,#7b,#01
	db #14,#05,#00,#00,#09,#01,#aa,#01
	db #1e,#05,#02,#00,#00,#14,#0d,#00
	db #1d,#01,#7b,#01,#14,#05,#00,#00
	db #0f,#01,#7b,#01,#14,#05,#00,#00
	db #11,#01,#52,#01,#14,#05,#00,#00
	db #09,#01,#3f,#01,#14,#05,#02,#00
	db #00,#14,#0d,#00,#11,#01,#52,#01
	db #14,#05,#00,#00,#09,#01,#aa,#01
	db #14,#05,#00,#00,#09,#01,#7b,#01
	db #1e,#05,#00,#00,#1d,#01,#7b,#01
	db #14,#05,#00,#00,#09,#01,#aa,#01
	db #1e,#05,#02,#00,#00,#14,#0d,#00
	db #1d,#01,#7b,#01,#14,#05,#00,#00
	db #0f,#01,#7b,#01,#14,#05,#00,#00
	db #11,#01,#7b,#01,#14,#05,#00,#00
	db #09,#01,#fa,#01,#14,#05,#02,#00
	db #00,#14,#0d,#00,#11,#01,#aa,#01
	db #14,#05,#02,#00,#00,#14,#0d,#00
	db #11,#01,#7b,#01,#1e,#05,#00,#00
	db #1d,#01,#7b,#01,#14,#05,#00,#00
	db #09,#01,#aa,#01,#1e,#05,#02,#00
	db #00,#14,#0d,#00,#1d,#01,#7b,#01
	db #14,#05,#00,#00,#0f,#01,#7b,#01
	db #14,#05,#00,#00,#11,#01,#52,#01
	db #14,#05,#00,#00,#09,#01,#3f,#01
	db #14,#05,#02,#00,#00,#14,#0d,#00
	db #11,#01,#52,#01,#14,#05,#00,#00
	db #09,#01,#aa,#01,#14,#05,#00,#00
	db #09,#01,#7b,#01,#1e,#05,#00,#00
	db #1d,#01,#7b,#01,#14,#05,#00,#00
	db #09,#01,#aa,#01,#1e,#05,#02,#00
	db #00,#14,#0d,#00,#1d,#01,#7b,#01
	db #14,#05,#00,#00,#0f,#01,#7b,#01
	db #14,#05,#00,#00,#11,#01,#7b,#01
	db #14,#05,#00,#00,#09,#01,#fa,#01
	db #14,#05,#02,#00,#00,#14,#0d,#00
	db #11,#01,#aa,#01,#14,#05,#02,#00
	db #00,#14,#0d,#00,#11,#01,#7b,#01
	db #1e,#05,#00,#04,#9f,#00,#14,#01
	db #1d,#01,#7b,#01,#14,#05,#00,#04
	db #a9,#00,#14,#01,#09,#01,#aa,#01
	db #1e,#05,#02,#00,#00,#14,#02,#04
	db #d5,#00,#14,#01,#1d,#01,#7b,#01
	db #14,#05,#00,#04,#be,#00,#14,#01
	db #0f,#01,#7b,#01,#14,#05,#00,#04
	db #9f,#00,#14,#01,#11,#01,#52,#01
	db #14,#05,#00,#04,#a9,#00,#14,#01
	db #09,#01,#3f,#01,#14,#05,#02,#00
	db #00,#14,#02,#04,#8e,#00,#14,#01
	db #11,#01,#52,#01,#14,#05,#00,#04
	db #7f,#00,#14,#01,#09,#01,#aa,#01
	db #14,#05,#00,#04,#77,#00,#14,#01
	db #09,#01,#7b,#01,#1e,#05,#00,#04
	db #7f,#00,#14,#01,#1d,#01,#7b,#01
	db #14,#05,#00,#04,#9f,#00,#14,#01
	db #09,#01,#aa,#01,#1e,#05,#02,#00
	db #00,#14,#02,#04,#47,#00,#c8,#0c
	db #1d,#01,#7b,#01,#14,#05,#00,#00
	db #0f,#01,#7b,#01,#14,#05,#00,#00
	db #11,#01,#7b,#01,#14,#05,#00,#00
	db #09,#01,#fa,#01,#14,#05,#02,#00
	db #00,#14,#0d,#00,#11,#01,#aa,#01
	db #14,#05,#02,#00,#00,#14,#06,#00
	db #11,#01,#7b,#01,#1e,#05,#00,#04
	db #9f,#00,#14,#01,#1d,#01,#7b,#01
	db #14,#05,#00,#04,#a9,#00,#14,#01
	db #09,#01,#aa,#01,#1e,#05,#02,#00
	db #00,#14,#02,#04,#d5,#00,#14,#01
	db #1d,#01,#7b,#01,#14,#05,#00,#04
	db #be,#00,#14,#01,#0f,#01,#7b,#01
	db #14,#05,#00,#04,#9f,#00,#14,#01
	db #11,#01,#52,#01,#14,#05,#00,#04
	db #a9,#00,#14,#01,#09,#01,#3f,#01
	db #14,#05,#02,#00,#00,#14,#02,#04
	db #8e,#00,#14,#01,#11,#01,#52,#01
	db #14,#05,#00,#04,#7f,#00,#14,#01
	db #09,#01,#aa,#01,#14,#05,#00,#04
	db #77,#00,#14,#01,#09,#01,#7b,#01
	db #1e,#05,#00,#04,#7f,#00,#14,#01
	db #1d,#01,#7b,#01,#14,#05,#00,#04
	db #9f,#00,#14,#01,#09,#01,#aa,#01
	db #1e,#05,#02,#00,#00,#14,#02,#04
	db #47,#00,#c8,#0c,#1d,#01,#7b,#01
	db #14,#05,#00,#00,#0f,#01,#7b,#01
	db #14,#05,#00,#00,#11,#01,#7b,#01
	db #14,#05,#00,#00,#09,#01,#fa,#01
	db #14,#05,#02,#00,#00,#14,#0d,#00
	db #11,#01,#aa,#01,#14,#05,#02,#00
	db #00,#14,#06,#00,#11,#01,#7b,#01
	db #1e,#05,#00,#04,#7f,#00,#14,#01
	db #1d,#01,#7b,#01,#14,#05,#00,#04
	db #7f,#00,#14,#01,#09,#01,#aa,#01
	db #1e,#05,#02,#00,#00,#14,#02,#04
	db #9f,#00,#14,#01,#1d,#01,#7b,#01
	db #14,#05,#00,#04,#8e,#00,#14,#01
	db #0f,#01,#7b,#01,#14,#05,#00,#04
	db #8e,#00,#14,#01,#11,#01,#52,#01
	db #14,#05,#00,#04,#8e,#00,#14,#01
	db #09,#01,#3f,#01,#14,#05,#02,#00
	db #00,#14,#02,#04,#8e,#00,#14,#01
	db #11,#01,#52,#01,#14,#05,#00,#04
	db #a9,#00,#14,#01,#09,#01,#aa,#01
	db #14,#05,#00,#04,#9f,#00,#14,#01
	db #09,#01,#7b,#01,#1e,#05,#00,#04
	db #8e,#00,#14,#01,#1d,#01,#7b,#01
	db #14,#05,#00,#04,#8e,#00,#14,#01
	db #09,#01,#aa,#01,#1e,#05,#02,#00
	db #00,#14,#02,#04,#47,#00,#c8,#0c
	db #1d,#01,#7b,#01,#14,#05,#00,#00
	db #0f,#01,#7b,#01,#14,#05,#00,#00
	db #11,#01,#7b,#01,#14,#05,#00,#00
	db #09,#01,#fa,#01,#14,#05,#02,#00
	db #00,#14,#0d,#00,#11,#01,#aa,#01
	db #14,#05,#02,#00,#00,#14,#06,#00
	db #11,#00,#00,#00,#08,#01,#01,#01
	db #01,#01,#01,#01,#08,#01,#01,#0a
	db #01,#01,#01,#0a,#01,#01,#01,#01
	db #01,#01,#01,#0b,#01,#01,#01,#01
	db #01,#01,#01,#08,#01,#01,#01,#01
	db #0a,#01,#01,#0b,#01,#01,#01,#01
	db #01,#01,#01,#01,#01,#01,#01,#01
	db #01,#01,#01,#01,#01,#01,#01,#01
	db #01,#01,#01,#01,#01,#01,#01,#01
	db #01,#01,#01,#01,#0d,#01,#01,#01
	db #01,#0d,#01,#01,#06,#0c,#06,#06
	db #0c,#0c,#06,#06,#0c,#06,#01,#07
	db #01,#07,#01,#01,#07,#01,#07,#01
	db #01,#0b,#01,#01,#0a,#01,#06,#0c
	db #06,#0c,#01,#01,#01,#01,#01,#01
	db #01,#05,#01,#01,#0a,#01,#01,#08
	db #01,#01,#0b,#05,#01,#01,#01,#01
	db #0a,#01,#01,#01,#01,#05,#01,#0b
	db #01,#01,#01,#01,#01,#01,#01,#05
	db #01,#01,#01,#01,#01,#01,#01,#01
	db #01,#05,#01,#01,#01,#01,#01,#01
	db #01,#01,#01,#05,#01,#01,#01,#01
	db #01,#01,#01,#01,#01,#05,#01,#01
	db #0c,#06,#0c,#02,#03,#04,#0c,#06
	db #0c,#06,#07,#01,#07,#01,#01,#01
	db #07,#01,#07,#01,#0c,#06,#0c,#06
	db #0b,#01,#08,#01,#01,#08,#08,#01
	db #05,#0a,#01,#01,#01,#01,#01,#01
	db #01,#01,#05,#01,#01,#0a,#01,#0b
	db #01,#0a,#01,#0a,#05,#01,#01,#01
	db #01,#01,#01,#01,#01,#01,#05,#01
	db #01,#01,#01,#01,#01,#01,#01,#01
	db #05,#01,#01,#01,#01,#01,#01,#01
	db #01,#01,#05,#01,#01,#01,#01,#01
	db #01,#01,#01,#01,#05,#01,#01,#01
	db #01,#01,#01,#01,#0c,#06,#0c,#02
	db #03,#03,#04,#0c,#06,#0c,#01,#0c
	db #01,#01,#01,#01,#01,#01,#0c,#01
	db #01,#0a,#01,#08,#01,#0b,#01,#01
	db #01,#08,#01,#01,#01,#01,#0a,#01
	db #0a,#01,#0b,#01,#0a,#01,#0b,#01
	db #01,#01,#01,#01,#01,#0a,#01,#01
	db #01,#01,#0a,#01,#08,#01,#01,#01
	db #01,#01,#01,#01,#01,#01,#01,#01
	db #01,#01,#01,#01,#01,#01,#01,#01
	db #01,#01,#01,#01,#01,#01,#01,#01
	db #01,#01,#01,#01,#01,#01,#01,#01
	db #01,#01,#0d,#01,#01,#01,#01,#01
	db #0c,#02,#04,#0c,#06,#06,#0c,#02
	db #04,#0c,#07,#01,#01,#05,#01,#01
	db #05,#01,#01,#07,#0a,#01,#01,#01
	db #08,#01,#0b,#09,#09,#09,#01,#0b
	db #01,#01,#01,#0b,#01,#01,#05,#01
	db #01,#01,#01,#0a,#01,#01,#01,#0a
	db #05,#08,#01,#01,#01,#01,#01,#0a
	db #01,#01,#05,#01,#01,#01,#01,#01
	db #01,#01,#01,#01,#05,#01,#01,#01
	db #01,#01,#01,#01,#01,#01,#05,#01
	db #01,#01,#01,#01,#01,#01,#01,#01
	db #05,#01,#01,#01,#0d,#01,#01,#01
	db #01,#01,#05,#01,#06,#0c,#06,#0c
	db #02,#04,#09,#06,#09,#06,#01,#05
	db #01,#05,#01,#01,#05,#01,#05,#01
	db #09,#09,#09,#01,#01,#0a,#01,#01
	db #01,#08,#08,#05,#01,#0a,#01,#01
	db #01,#01,#0b,#01,#01,#05,#01,#01
	db #01,#01,#08,#01,#01,#05,#01,#05
	db #0b,#01,#01,#01,#01,#0f,#10,#05
	db #01,#05,#01,#01,#01,#01,#01,#11
	db #12,#05,#01,#05,#01,#01,#01,#01
	db #01,#13,#14,#05,#01,#05,#01,#01
	db #01,#01,#01,#15,#16,#05,#01,#05
	db #01,#01,#0e,#0e,#0e,#17,#18,#05
	db #09,#06,#09,#06,#09,#06,#09,#06
	db #09,#06,#01,#05,#01,#05,#01,#05
	db #01,#05,#01,#05,#00,#00
;
.game_name
	db "Zone Part 2",0
.game_year
	db "1989",0
.game_publisher
	db "Black System",0
.music_author
	db "Luc Guillaume",0
.music_comment
	db "",0

	read "music_end_v1_0.asm"
